YES 0.6960000000000001
↳ HASKELL
↳ BR
((enumFromTo :: () -> () -> [()]) :: () -> () -> [()]) |
import qualified Prelude |
↳ HASKELL
↳ BR
↳ HASKELL
↳ COR
((enumFromTo :: () -> () -> [()]) :: () -> () -> [()]) |
import qualified Prelude |
undefined
| False
= undefined
undefined = undefined1
undefined0 True = undefined
undefined1 = undefined0 False
takeWhile p [] = [] takeWhile p (x : xs)
| p x
= x : takeWhile p xs | otherwise
= []
takeWhile p [] = takeWhile3 p [] takeWhile p (x : xs) = takeWhile2 p (x : xs)
takeWhile1 p x xs True = x : takeWhile p xs takeWhile1 p x xs False = takeWhile0 p x xs otherwise
takeWhile0 p x xs True = []
takeWhile2 p (x : xs) = takeWhile1 p x xs (p x)
takeWhile3 p [] = [] takeWhile3 wv ww = takeWhile2 wv ww
toEnum 0 = ()
toEnum wx = toEnum1 wx
toEnum0 True wx = ()
toEnum1 wx = toEnum0 (wx == 0) wx
↳ HASKELL
↳ BR
↳ HASKELL
↳ COR
↳ HASKELL
↳ NumRed
((enumFromTo :: () -> () -> [()]) :: () -> () -> [()]) |
import qualified Prelude |
↳ HASKELL
↳ BR
↳ HASKELL
↳ COR
↳ HASKELL
↳ NumRed
↳ HASKELL
↳ Narrow
(enumFromTo :: () -> () -> [()]) |
import qualified Prelude |